MacTech 1 to 12

home *** CD-ROM | disk | FTP | other *** search

/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 02 - 1986 / 02.02 Feb 86.sit / 02.02 Feb 86 / Basic 2.2 / Kelly's Basic / asm routine / BlankScreen.asm next >

MacBinary | 1985-12-16 | 1.6 KB | [TEXT/EDIT]

open in:

MacOS 8.1 extracted |

Win98 extracted |

DOS extracted

browse contents |

view JSON data |

view as text

This file was processed as: MacBinary (archive/macBinary).

Confidence	Program	Detection	Match Type	Support
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Sun Dec 15 20:37:44 1985, modified Sun Dec 15 20:37:44 1985, creator Macintosh Edit, type ASCII, 926 bytes "BlankScreen.asm" , at 0x41e 490 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default

id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[EDIT]`

hex view

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0f 42 6c 61 6e 6b 53 | 63 72 65 65 6e 2e 61 73 |..BlankS|creen.as|
|00000010| 6d 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |m.......|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 45 44 49 | 54 01 00 00 00 00 00 00 |.TEXTEDI|T.......|
|00000050| 00 00 00 00 00 03 9e 00 | 00 01 ea 9a 29 2d 68 9a |........|....)-h.|
|00000060| 29 2d 68 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |)-h.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 fc 06 00 00 |........|........|
|00000080| 3b 20 42 41 53 49 43 20 | 42 6c 61 6e 6b 53 63 72 |; BASIC |BlankScr|
|00000090| 65 65 6e 20 4c 69 62 72 | 61 72 79 20 53 6f 75 72 |een Libr|ary Sour|
|000000a0| 63 65 20 43 6f 64 65 0d | 3b 20 42 79 20 44 61 76 |ce Code.|; By Dav|
|000000b0| 65 20 4b 65 6c 6c 79 0d | 3b 20 4d 61 63 54 75 74 |e Kelly.|; MacTut|
|000000c0| 6f 72 20 31 39 38 35 0d | 0d 3b 53 79 6e 6f 70 73 |or 1985.|.;Synops|
|000000d0| 69 73 3a 0d 3b 09 43 41 | 4c 4c 20 42 6c 61 6e 6b |is:.;.CA|LL Blank|
|000000e0| 53 63 72 65 65 6e 20 28 | 6d 65 6d 6f 72 79 25 29 |Screen (|memory%)|
|000000f0| 0d 3b 4f 75 74 70 75 74 | 3a 0d 0d 47 65 74 4e 65 |.;Output|:..GetNe|
|00000100| 78 74 4c 69 62 41 72 67 | 09 45 51 55 09 24 32 41 |xtLibArg|.EQU.$2A|
|00000110| 0d 49 6e 74 65 67 65 72 | 41 72 67 09 45 51 55 09 |.Integer|Arg.EQU.|
|00000120| 24 33 32 0d 42 61 73 69 | 63 45 72 72 6f 72 09 45 |$32.Basi|cError.E|
|00000130| 51 55 09 24 34 32 0d 53 | 63 72 65 65 6e 35 31 32 |QU.$42.S|creen512|
|00000140| 09 45 51 55 09 28 28 35 | 31 32 2d 31 32 38 29 2a |.EQU.((5|12-128)*|
|00000150| 31 30 32 34 29 2b 31 30 | 38 32 38 38 0d 53 63 72 |1024)+10|8288.Scr|
|00000160| 65 65 6e 31 32 38 09 45 | 51 55 09 31 30 38 32 38 |een128.E|QU.10828|
|00000170| 38 0d 0d 09 0d 09 4a 53 | 52 09 47 65 74 4e 65 78 |8.....JS|R.GetNex|
|00000180| 74 4c 69 62 41 72 67 28 | 61 35 29 09 3b 47 65 74 |tLibArg(|a5).;Get|
|00000190| 20 74 68 65 20 6e 65 78 | 74 20 61 72 67 75 6d 65 | the nex|t argume|
|000001a0| 6e 74 0d 09 4a 53 52 09 | 49 6e 74 65 67 65 72 41 |nt..JSR.|IntegerA|
|000001b0| 72 67 28 61 35 29 09 3b | 5b 64 33 3a 77 5d 20 3d |rg(a5).;|[d3:w] =|
|000001c0| 20 69 6e 74 65 67 65 72 | 20 28 65 72 72 6f 72 20 | integer| (error |
|000001d0| 69 66 20 61 72 67 0d 09 | 09 09 09 3b 63 61 6e 27 |if arg..|...;can'|
|000001e0| 74 20 62 65 20 66 6f 72 | 63 65 64 20 69 6e 74 6f |t be for|ced into|
|000001f0| 20 61 6e 20 69 6e 74 65 | 67 65 72 0d 09 43 4d 50 | an inte|ger..CMP|
|00000200| 2e 57 09 23 31 32 38 2c | 64 33 0d 09 42 45 51 09 |.W.#128,|d3..BEQ.|
|00000210| 44 6f 31 32 38 09 09 3b | 62 72 61 6e 63 68 20 69 |Do128..;|branch i|
|00000220| 66 20 31 32 38 4b 20 6d | 65 6d 6f 72 79 0d 09 43 |f 128K m|emory..C|
|00000230| 4d 50 2e 57 09 23 35 31 | 32 2c 64 33 0d 09 42 45 |MP.W.#51|2,d3..BE|
|00000240| 51 09 44 6f 35 31 32 09 | 09 3b 62 72 61 6e 63 68 |Q.Do512.|.;branch|
|00000250| 20 69 66 20 35 31 32 4b | 20 6d 65 6d 6f 72 79 0d | if 512K| memory.|
|00000260| 44 65 76 69 63 65 5f 55 | 6e 61 76 61 69 6c 61 62 |Device_U|navailab|
|00000270| 6c 65 3a 0d 09 4d 4f 56 | 45 51 09 23 36 38 2c 64 |le:..MOV|EQ.#68,d|
|00000280| 32 09 09 3b 44 65 76 69 | 63 65 20 55 6e 61 76 61 |2..;Devi|ce Unava|
|00000290| 69 6c 61 62 6c 65 20 65 | 72 72 6f 72 0d 09 4a 53 |ilable e|rror..JS|
|000002a0| 52 09 42 61 73 69 63 45 | 72 72 6f 72 28 61 35 29 |R.BasicE|rror(a5)|
|000002b0| 0d 44 6f 35 31 32 09 4c | 45 41 09 53 63 72 65 65 |.Do512.L|EA.Scree|
|000002c0| 6e 35 31 32 2c 41 30 0d | 09 42 52 41 09 42 6c 61 |n512,A0.|.BRA.Bla|
|000002d0| 6e 6b 0d 44 6f 31 32 38 | 09 4c 45 41 09 53 63 72 |nk.Do128|.LEA.Scr|
|000002e0| 65 65 6e 31 32 38 2c 41 | 30 0d 42 6c 61 6e 6b 09 |een128,A|0.Blank.|
|000002f0| 4d 4f 56 45 2e 57 09 23 | 35 34 37 32 2d 31 2c 64 |MOVE.W.#|5472-1,d|
|00000300| 31 09 3b 73 65 74 75 70 | 20 68 69 67 68 20 73 63 |1.;setup| high sc|
|00000310| 72 65 65 6e 20 61 64 64 | 72 65 73 73 0d 09 4d 4f |reen add|ress..MO|
|00000320| 56 45 2e 4c 09 23 24 46 | 46 46 46 46 46 46 46 2c |VE.L.#$F|FFFFFFF,|
|00000330| 64 30 09 3b 6d 6f 76 65 | 20 74 6f 20 64 30 0d 4c |d0.;move| to d0.L|
|00000340| 6f 6f 70 09 4d 4f 56 45 | 2e 4c 09 64 30 2c 28 41 |oop.MOVE|.L.d0,(A|
|00000350| 30 29 2b 09 3b 73 65 74 | 20 73 63 72 65 65 6e 20 |0)+.;set| screen |
|00000360| 61 64 64 72 65 73 73 20 | 74 6f 20 64 30 0d 09 44 |address |to d0..D|
|00000370| 42 52 41 09 64 31 2c 4c | 6f 6f 70 0d 09 52 54 53 |BRA.d1,L|oop..RTS|
|00000380| 0d 47 65 74 49 6e 74 65 | 67 65 72 56 61 72 3a 0d |.GetInte|gerVar:.|
|00000390| 09 4a 53 52 09 47 65 74 | 4e 65 78 74 4c 69 62 41 |.JSR.Get|NextLibA|
|000003a0| 72 67 28 61 35 29 09 3b | 47 65 74 20 74 68 65 20 |rg(a5).;|Get the |
|000003b0| 6e 65 78 74 20 61 72 67 | 75 6d 65 6e 74 0d 09 4a |next arg|ument..J|
|000003c0| 53 52 09 49 6e 74 65 67 | 65 72 41 72 67 28 61 35 |SR.Integ|erArg(a5|
|000003d0| 29 09 3b 5b 64 33 3a 77 | 5d 20 3d 20 69 6e 74 65 |).;[d3:w|] = inte|
|000003e0| 67 65 72 20 28 65 72 72 | 6f 72 20 69 66 20 61 72 |ger (err|or if ar|
|000003f0| 67 0d 09 09 09 09 3b 63 | 61 6e 27 74 20 62 65 20 |g.....;c|an't be |
|00000400| 66 6f 72 63 65 64 20 69 | 6e 74 6f 20 61 6e 20 69 |forced i|nto an i|
|00000410| 6e 74 65 67 65 72 0d 09 | 52 54 53 09 09 0d 00 00 |nteger..|RTS.....|
|00000420| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000430| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000440| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000460| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000480| 00 00 01 00 00 00 01 16 | 00 00 00 16 00 00 00 d4 |........|........|
|00000490| 4d 04 45 78 65 63 04 45 | 64 69 74 05 4d 44 53 31 |M.Exec.E|dit.MDS1|
|000004a0| 3a 72 72 05 4d 44 53 31 | 3a 2e 45 72 72 05 4d 44 |:rr.MDS1|:.Err.MD|
|000004b0| 0f 42 6c 61 6e 6b 53 63 | 72 65 65 6e 2e 61 73 6d |.BlankSc|reen.asm|
|000004c0| 02 00 00 00 54 45 58 54 | 45 44 49 54 01 00 00 40 |....TEXT|EDIT...@|
|000004d0| 00 00 54 45 58 54 45 44 | 49 54 01 00 00 40 00 c0 |..TEXTED|IT...@..|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 9a 0c 00 9b 00 00 | 03 9e 00 00 01 ea 55 4f |........|......UO|
|00000500| 2f 2e ff ec 48 6e ff f0 | a8 ad 10 1f 67 e2 60 9e |/...Hn..|....g.`.|
|00000510| 28 5f 4e 5e 20 5f 54 4f | 4e d0 4e 56 ff fe 48 e7 |(_N^ _TO|N.NV..H.|
|00000520| 01 08 28 7a f3 66 55 4f | 3f 2e 00 08 61 00 f9 0a |..(z.fUO|?...a...|
|00000530| 4a 5f 66 00 00 94 3f 2e | 00 08 61 00 f8 ce 55 4f |J_f...?.|..a...UO|
|00000540| 3f 3c 00 04 61 00 f8 f2 | 0c 5f 00 01 66 38 3f 3c |?<..a...|._..f8?<|
|00000550| 00 01 61 00 f9 48 4a 38 | 00 f3 67 04 3e bc 00 06 |..a..HJ8|..g.>...|
|00000560| 1f 3c 00 01 61 00 f3 28 | 61 00 f2 fe 10 2c 00 ee |.<..a..(|a....,..|
|00000570| 67 12 61 00 fa 4c 61 00 | f7 da 10 2c 00 ef 66 04 |g.a..La.|...,..f.|
|00000580| 00 00 00 0a 00 09 06 4d | 6f 6e 61 63 6f 0e 00 00 |.......M|onaco...|
|00000590| 00 04 00 06 00 08 00 00 | 01 00 00 00 01 16 00 00 |........|........|
|000005a0| 00 16 00 00 00 d4 00 00 | cc 1c 00 7a 00 00 00 1c |........|...z....|
|000005b0| 00 46 00 01 45 46 4e 54 | 00 00 00 12 45 54 41 42 |.F..EFNT|....ETAB|
|000005c0| 00 00 00 1e 03 eb 00 00 | 00 00 00 00 00 01 6a 24 |........|......j$|
|000005d0| 03 ec 00 47 00 00 00 0e | 00 01 69 fc 46 4f 42 4a |...G....|..i.FOBJ|
|000005e0| ff ff ff ff 00 40 01 aa | 00 40 01 ac 00 40 01 ae |.....@..|.@...@..|
|000005f0| 00 40 01 b0 00 40 01 b2 | 00 40 01 b4 00 40 01 b6 |.@...@..|.@...@..|
|00000600| 00 40 01 b8 00 40 10 18 | 00 40 01 bc 00 40 01 be |.@...@..|.@...@..|
|00000610| 00 40 01 be 00 40 01 be | 00 40 01 be 00 40 01 be |.@...@..|.@...@..|
|00000620| 00 40 01 46 4f 42 4a ff | ff ff ff 00 40 01 aa 00 |.@.FOBJ.|....@...|
|00000630| 40 01 ac 00 40 01 ae 00 | 40 01 b0 00 40 01 b2 00 |@...@...|@...@...|
|00000640| 40 01 b4 00 40 01 b6 00 | 40 01 b8 00 40 10 18 00 |@...@...|@...@...|
|00000650| 40 01 bc 00 40 01 be 00 | 40 01 be 00 40 01 be 00 |@...@...|@...@...|
|00000660| 40 01 be 00 40 01 be 00 | 40 01 00 00 00 00 00 00 |@...@...|@.......|
|00000670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+